Digital Photo Album: Houko Kuwashima/Digital Photo Album: Houko Kuwashima.iso/cont.dxr/00011.ls

Text File | 1998-10-08 | 394 b | 24 lines

on idle
  repeat with ch = 10 to 15
    if rollOver(ch) then
      showsprite(ch)
      exit
    end if
  end repeat
  hidesprite()
end

on showsprite ch
  puppetSprite(ch + 10, 1)
  set the visible of sprite (ch + 10) to 1
  updateStage()
end

on hidesprite
  repeat with ch = 10 to 15
    set the visible of sprite (ch + 10) to 0
    puppetSprite(ch + 10, 0)
  end repeat
  updateStage()
end